object DM_Agendamento: TDM_Agendamento
  OldCreateOrder = False
  Height = 378
  Width = 215
  object SQLAgendamento: TSQLDataSet
    CommandText = 
      'select'#13#10' agendamento.*,'#13#10' funcionario.nome as funcionario,'#13#10' cli' +
      'ente.nome as cliente,'#13#10' servico.nome as servico '#13#10'from '#13#10' agenda' +
      'mento '#13#10' join funcionario on agendamento.id_funcionario = funcio' +
      'nario.id_funcionario '#13#10' join cliente on agendamento.id_cliente =' +
      ' cliente.id_cliente '#13#10' join servico on agendamento.id_servico = ' +
      'servico.id_servico '#13#10' where agendamento.data = :dataini'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftDate
        Name = 'dataini'
        ParamType = ptInput
      end>
    SQLConnection = DataModule1.SQLConnection1
    Left = 56
    Top = 16
  end
  object DSPAgendamento: TDataSetProvider
    DataSet = SQLAgendamento
    Left = 56
    Top = 80
  end
  object CDSAgendamento: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftDate
        Name = 'dataini'
        ParamType = ptInput
      end>
    ProviderName = 'DSPAgendamento'
    Left = 56
    Top = 144
    object CDSAgendamentoID_AGENDAMENTO: TIntegerField
      FieldName = 'ID_AGENDAMENTO'
      Required = True
    end
    object CDSAgendamentoID_CLIENTE: TIntegerField
      FieldName = 'ID_CLIENTE'
    end
    object CDSAgendamentoID_FUNCIONARIO: TIntegerField
      FieldName = 'ID_FUNCIONARIO'
    end
    object CDSAgendamentoID_SERVICO: TIntegerField
      FieldName = 'ID_SERVICO'
    end
    object CDSAgendamentoSTATUS: TStringField
      FieldName = 'STATUS'
      Size = 1
    end
    object CDSAgendamentoDATA: TDateField
      FieldName = 'DATA'
    end
    object CDSAgendamentoHORA: TTimeField
      FieldName = 'HORA'
    end
    object CDSAgendamentoDURACAO: TTimeField
      FieldName = 'DURACAO'
    end
    object CDSAgendamentoFUNCIONARIO: TStringField
      FieldName = 'FUNCIONARIO'
      Size = 150
    end
    object CDSAgendamentoCLIENTE: TStringField
      FieldName = 'CLIENTE'
      Size = 150
    end
    object CDSAgendamentoSERVICO: TStringField
      FieldName = 'SERVICO'
      Size = 50
    end
  end
  object DSAgendamento: TDataSource
    DataSet = CDSAgendamento
    Left = 56
    Top = 200
  end
end
